home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1996 March / macformat-035.iso / Shareware City / Developers / MoreFiles 1.4.1 / UpperString.p < prev    next >
Encoding:
Text File  |  1995-12-21  |  859 b   |  30 lines  |  [TEXT/CWIE]
  1. {    What's this unit?                                                        }
  2. {                                                                            }
  3. {    MoreFiles libraries are built with the latest interfaces and libraries    }
  4. {    available to me. However, THINK Pascal's libraries have not been        }
  5. {    updated recently and so linking is a problem if a name in a libraries    }
  6. {    I link with changes.                                                    }
  7. {                                                                            }
  8. {    One of the things that changed recently is that UprString was renamed    }
  9. {    to UpperString in the libraries. Including this unit lets Think Pascal    }
  10. {    programs link with MoreFiles.                                            }
  11. {                                                                            }
  12. {    Jim Luther, Apple Developer Technical Support                            }
  13.  
  14.  
  15. UNIT UpperString;
  16.  
  17. INTERFACE
  18.  
  19.     PROCEDURE UpperString (VAR theString: Str255;
  20.                                     diacSens: BOOLEAN);
  21.  
  22. IMPLEMENTATION
  23.  
  24.     PROCEDURE UpperString (VAR theString: Str255;
  25.                                     diacSens: BOOLEAN);
  26.     BEGIN
  27.         UprString(theString, diacSens);
  28.     END;
  29.  
  30. END.